home *** CD-ROM | disk | FTP | other *** search
/ Amiga Magazin: Amiga-CD 1997 September & October / Amiga-CD 1997 #9-10.iso / aminet / paßwort / code next >
Text File  |  1997-05-23  |  312b  |  17 lines
  1. failat 21
  2. echo ""
  3. echo "  Vorname, Name"
  4. echo "  Straße, Hausnummer"
  5. echo "  Postleitzahl, Ort"
  6. echo ""
  7. echo "  Paßwort: Dreimalige Falscheingabe blockiert jeden weiteren Zugang!"
  8. echo ""
  9.  
  10. lab passwort
  11. echo noline "  Paßwort eingeben: "
  12. set > nil: InpVar ?
  13.  
  14. IF $InpVar NOT eq "Paßwort" 
  15. skip back passwort
  16. endif
  17.